home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1 / Nebula One.iso / Mail / pine3.92 / pine / osdep / fgetpos.non < prev    next >
Text File  |  1993-07-20  |  489b  |  23 lines
  1. /*----------------------------------------------------------------------
  2.    This is an emulation of the ANSI C fgetpos function.
  3.   ----*/
  4. fget_pos(stream, ptr)
  5. FILE *stream;
  6. fpos_t *ptr;
  7. {
  8.     *ptr = (fpos_t)ftell(stream);
  9.     return (*ptr == -1L ? -1 : 0);
  10. }
  11.  
  12. /*----------------------------------------------------------------------
  13.    This is an emulation of the ANSI C fsetpos function.
  14.   ----*/
  15. fset_pos(stream, ptr)
  16. FILE *stream;
  17. fpos_t *ptr;
  18. {
  19.     return fseek(stream, *ptr, 0);
  20. }
  21.  
  22.  
  23.